home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / programr / ptrp25dm.zip / TEST4.TRP < prev    next >
Text File  |  1995-01-17  |  170b  |  8 lines

  1. procedure main
  2.         local 
  3.                 variable : real;
  4.         endvar
  5.         variable := 5 + cos(0);
  6.         writeln("The Variable : ", variable)
  7. endproc
  8.